Imports CapaDatos
Imports CapaEntidad
                + "Public Class " + proyecto.getStr_ClaseNegocio() + str_NomClase + "\n\n"
                + "\tPublic Sub Insertar" + str_NomClase + "(ByVal " + str_NomClase + " As " + str_NomClase + ", ByVal conexion As String, ByRef Verificador As Integer)\n"
                + "\t\tTry\n"
                + "\t\t\tDim claseCapaDatos As New CapaDatos.CD_" + str_NomClase + "()\n"
                + "\t\t\tclaseCapaDatos.Insertar" + str_NomClase + "(" + str_NomClase + ", conexion, Verificador)\n"
                + "\t\tCatch ex As Exception\n"
                + "\t\t\tThrow ex\n"
                + "\t\tEnd Try\n"
                + "\tEnd Sub\n"
                + "\tPublic Sub Consulta" + str_NomClase + "(ByRef Grid As System.Web.UI.WebControls.GridView, ByVal " + str_NomClase + " As " + str_NomClase + ", ByVal conexion As String, ByRef List As System.Collections.Generic.List(Of " + str_NomClase + "))\n"
                + "\t\tTry\n"
                + "\t\t\tDim claseCapaDatos As New CapaDatos.CD_" + str_NomClase + "()\n"
                + "\t\t\tclaseCapaDatos.Consulta" + str_NomClase + "(" + str_NomClase + ", conexion, List)\n\n"
                + "\t\t\tGrid.DataSource = List\n"
                + "\t\t\tGrid.DataBind()\n"
                + "\t\tCatch ex As Exception\n"
                + "\t\t\tThrow ex\n"
                + "\t\tEnd Try\n"
                + "\tEnd Sub\n"
                + "\tPublic Sub Modificar" + str_NomClase + "(ByVal " + str_NomClase + " As " + str_NomClase + ", ByVal conexion As String, ByRef Verificador As Integer)\n"
                + "\t\tTry\n"
                + "\t\t\tDim claseCapaDatos As New CapaDatos.CD_" + str_NomClase + "()\n"
                + "\t\t\tclaseCapaDatos.Modificar" + str_NomClase + "(" + str_NomClase + ", conexion, Verificador)\n"
                + "\t\tCatch ex As Exception\n"
                + "\t\tThrow ex\n"
                + "\t\tEnd Try\n"
                + "\tEnd Sub\n\n"
                + "End Class";